home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / storage / function / scsi / add / write10.scr < prev    next >
Encoding:
Text File  |  1994-08-15  |  1.8 KB  |  63 lines
  1. * Writes data to the medium. 
  2. * Cache control bits can be set.
  3.  
  4. @THREAD WRITE10.LOG
  5. @NEWALIAS SADD SCSIADD.GRA
  6. @IMPORT SCSICOM.SCR
  7. SADD DD_OPEN
  8.  
  9. * 0=Async mode, 1=Sync mode
  10. SADD SET MODE=1
  11.  
  12. * Command completion timeout (Secs)
  13. * 0=the assigned value is the default set by the driver,
  14. * -1=the assigned value is infinite.
  15. SADD SET TIMEOUT=0
  16.  
  17. * Name for paramblock
  18. SADD SET LABEL = "READ CAPACITY"
  19.  
  20. SADD READCAPACITY
  21.  
  22. * 1(Cache if possible),  0(Need not cache it)
  23.   SADD SET CACHE_IF_POSSIBLE = 1
  24.  
  25. * 1(Force access form media), 0(May access from cache)
  26.   SADD SET FORCE_MEDIA_ACCESS = 0 
  27.  
  28. *  0 = indicates that the logical block address field
  29. *      specifies the first logical block of the range of
  30. *      logical blocks to be operated on by this command.
  31. *  1 = indicates that the logical block address field is
  32. *      a two's complement displacement.  This -ve or +ve
  33. *      displacement shall be added to the logical block
  34. *      address last accessed on the logical unit to form the
  35. *      logical block address for this command.
  36. SADD SET ADDR_MODE=0
  37.  
  38. * 32bit starting logical block addr for READ
  39. SADD SET LOGICAL_BLOCK_ADDR = 0x3e8
  40. SADD RESPONSE $PROMPT="STARTING LOGICAL BLK ADDR(READ) : " $RESPONSE=LOGICAL_BLOCK_ADDR $PAUSE=15
  41.  
  42. * No. of contiguous logical blocks to be read
  43. SADD SET NUM_BLOCKS = 1
  44. SADD RESPONSE $PROMPT=" # OF LOGICAL BLOCKS : " $RESPONSE=NUM_BLOCKS $PAUSE=15
  45.  
  46. * Name for paramblock
  47. SADD SET LABEL = "READ10"
  48.  
  49. SADD SET SCATGAT = ALPHA
  50. SADD READ10
  51.  
  52. * Name for paramblock
  53. SADD SET LABEL = "WRITE10"
  54.  
  55. * 32bit starting logical block addr for WRITE
  56. SADD SET LOGICAL_BLOCK_ADDR = 40
  57. SADD RESPONSE $PROMPT="STARTING LOGICAL BLK ADDR(WRITE) : " $RESPONSE=LOGICAL_BLOCK_ADDR $PAUSE=15
  58.  
  59. SADD WRITE10
  60.  
  61. SADD DD_CLOSE
  62.  
  63.